–€ `¢¼  BƢؠ BÆ¢ ½òi•€Ê½ò•€Êï©1©©R©€©  ¥‚¥ƒ© ©@ Yä­Éð >ÆLh¢þ½} èÐôî Ðî ­ðÐÎñ0ÎðLV¢ÿš© …É©… ø©ýÓ©©H©yH©·H©TH¥j© …jL”ïBAS2BOOT (c)1999 Jindroush›Loading GEMSETUP.BAS ›=./÷kÂC¤D¤E¤F¤ÇI¤ÌM¤P¤ÒS¤ÔU¤W¤Z¤ËB¤LINÅA¤PFÌMEM¤ÐÓØ€€€€€€€ € € €€€€€ GEMSETUP by Jackson Beebe›$$Sets Gemini printer from Atari›ANALOG JUNE '88/Pg 12›(INITIALIZE›2 A<MAIN MENU›Fk(>:A%,"A4AF-@k( P**(" | Öåò ³®±   GEMSETUP  Ê® Âååâå |Z**(" dE%( |B|ottom margin |€ |7-@'@E( (0-16) |n11( |C|Condensed | | |x11( |D|Double strike |‚ | |‚11( |E|Emphasized |ƒ | |ŒE%( |F|Font |„ |7-@'@E( (P/E/N) |–X( |G|PaGe length |…1-@%@8(|J-@'@X( (1-127) | **(" |H|Help | | |ª11( |I|Italics |† | |´X( |L|Left margin |‡1-@%@8(|J-@'@X( (1-255) |¾11( |M|Mini PRINT |ˆ | |ÈC( |P|Proportional |‰0-@%@C(| (1-6) |Ò**(" |Q|Quit to BASIC | | |ÜX( |R|Right margin |Š1-@%@7(|I-@&@X( (1-255) |æ00( |S|Spacing 72nds |‹ | (1-127) |ðW( |T|Top line |Œ1-@%@7(|I-@'@W( (1-16) |ú11( |U|Unidir print | | |11( |W|Wide print |Ž | |11( |Z|Zero slashed | | |**(" "Ž-@@"=(" command > O-@@"V( a@@@K:Ž)@, 6‘.>:,6‘4B)‘4bA @N+‘4C)‘4c,*4 &3>:@,.6.*@-@"@D(N AJN+‘4C)‘4c,*4*&3>:@,.6. @-@"@D(N ATY+‘4D)‘4d,*‚4 13>:@',>:@q,96‚.*K-@"@O(‚Y A^Y+‘4D)‘4d,*‚4*13>:@',>:@r,96‚. K-@"@O(‚Y AhY+‘4E)‘4e,*ƒ4 13>:@',>:@i,96ƒ.*K-@"@O(ƒY ArY+‘4E)‘4e,*ƒ4*13>:@',>:@p,96ƒ. K-@"@O(ƒY A|d+‘4F)‘4f,*„4P<3>:@',>:@f,>:@,D6„.EV-@"@Z(„d A†d+‘4F)‘4f,*„4E<3>:@',>:@f,>:@,D6„.NV-@"@Z(„d Ad+‘4F)‘4f,*„4N<3>:@',>:@f,>:@,D6„.PV-@"@Z(„d Aš‘4G)‘4gAp¤‘4H)‘4hA®Y+‘4I)‘4i,*†4 13>:@',>:@R,96†.*K-@"@O(†Y A¸Y+‘4I)‘4i,*†4*13>:@',>:@S,96†. K-@"@O(†Y A‘4L)‘4lA Ìd+‘4M)‘4m,*ˆ4 <3>:@',>:@ƒ,>:,D6ˆ.*V-@"@Z(ˆd AÖ1+‘4M)‘4m,*ˆ4*13>:@',>:@„,àY+‘4M)‘4m,*ˆ4*13>:@',>:@r,96ˆ. K-@"@O(ˆY Aê‘4P)‘4pApôd‘4Q)‘4q#-@@"8( J-@@!W3>:@,a+dþ‘4R)‘4rAP‘4S)‘4sA ‘4T)‘4tA Pd+‘4U)‘4u,*4 <3>:@',>:@…,>:@,D6.*V-@"@Z(d A&d+‘4U)‘4u,*4*<3>:@',>:@…,>:,D6. V-@"@Z(d A0d+‘4W)‘4w,*Ž4 <3>:@',>:@‡,>:@,D6Ž.*V-@"@Z(Žd A:d+‘4W)‘4w,*Ž4*<3>:@',>:@‡,>:,D6Ž. V-@"@Z(Žd ADd+‘4Z)‘4z,*4 <3>:@',>:@†,>:@,D6.*V-@"@ Z(d ANd+‘4Z)‘4z,*4*<3>:@',>:@†,>:,D6. V-@"@ Z(d AX6’-A AbBOTTOM MARGIN›lI-@@"3(NEW bottom margin E-@%@"I“v6’-A  A€6 6€-A:“,"€ )€!@, Ap6 A Š\!3>:@',>:@x,>:€,3-@"@;( M-@"@R(€\ A”PAGE LENGTH›žI-@@"3(NEW page length E-@%@"I“¨6’-Ap A²6 6…-A:“,"… )…!A', Ap6 Ap¼Z 3>:@',>:@g,>:…,2-@"@:( L-@"@P(…Z AÆLEFT MARGIN›ÐI-@@"3(NEW left margin E-@%@"I“Ú6’-A  Aä6 6‡-A:“,"‡ @)‡!AU, Ap6 A îZ 3>:@',>:@w,>:‡,2-@"@:( L-@"@P(‡Z AøPROPORTIONAL›f”"@23>:@',>:@,>:,86„.•J-@"@N(„`-@"@f(  -”"@6”-#6‰. - AT”"!-@@">(Letter spacing P-@%@"T“*6 6–-A:“,"– @)–!@, Ap6 A4F 3>:@',>:@,>:–,2-@"@8( >6•.„F6„. >8 6‰.=:–,-@"@"(–.6”-@8 AHRIGHT MARGIN›RI-@@"3(NEW right margin E-@%@"I“\6’-AP Af6 6Š-A:“,"Š @)Š!AU, Ap6 APpZ 3>:@',>:@,>:Š,2-@"@:( L-@"@P(ŠZ AzLINE SPACING›„J-@@"4(NEW line spacing X/72 F-@%@"J“Ž6’-A  A˜< 6—-A:“,6‹.“(— @)—!A'2 Ap< A ¢Z 3>:@',>:@e,>:—,2-@"@:( L-@"@P(‹Z A¬TOP LINE›¶I-@@"3(NEW top line E-@%@"I“À6’-A P AÊ6 6Œ-A:“,"Œ @)Œ!@, Ap6 A PÔY 3>:@',>:@‚,>:Œ,2-@"@9( K-@"@O(ŒY AÞSUBROUTINES›èCHECK FOR NUMBERS›ò “4 ' ’ü˜-@B:“,11@:“7˜<˜,, @H)@:“7˜<˜,,!@WAP  ˜ $T-@@"5(* must be numbers * I˜-@AM ˜P'T ’$ERROR MESSAGE›.P-@@"5(* WRONG numbers * I˜-@AM ˜P$8INSTRUCTIONS›Bn >:A%,"AA€4AA€F-@n(#        ÈÅÌР æïò  ÇÅÍÓÅÔÕР       LI(&( Sets up GEMINI printerI( for Atari 8-bit computer VS(-("1. Set paper and turn on printer.0(S(2. Using BASIC, run GEMSETUP.`V(.(#3. Enter commands to set the type,V(# margins, and special functions.jD+(# Re-selecting functions, togglesD( them on and off.tJ(-("4. Set margins last, as they varyJ( with each type size.~N(.(#5. Program performs a form feed onN( Quit, to realign paper.ˆK(*(6. Default right margin may beK( custom set at line 1280.’o-@@#=(" push A‘SAeAo @pœINITIALIAZE›¦‘;@,°””“;@,;@,‚;@,ƒ;@,„;@,†;@,ˆ;@,‹;@,;@,•;@,‰;@,Ž;@,;@,ºK6€-6…-@f'6‡-@36”-?6—-@K6Œ-@ÄT 6. 6‚. 6ƒ. #6„.P+6†. 36ˆ. <6‹.12D6. L6Ž. T6. ÎA• APØ3>:@',>:@d,âfF:A•,"A8(}0-@@BA@6f(* * TURN ON PRINTER * *ìXF:A•,"A8*-@@ Q(! push to begin U‘X%öDEFAULT RIGHT MARGIN›K6Š-@p,3>:@',>:@,>:Š,K( change R for new default )› $€D:GEMSETUP.BAS